home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 4 / Meeting Pearls Vol. IV (1996)(GTI - Schatztruhe)[!].iso / Pearls / dev / Oberon / OberonV4 / loader / Logger.def < prev    next >
Text File  |  1995-09-28  |  496b  |  24 lines
  1. DEFINITION MODULE Logger{"logger.library",40};
  2.  
  3. FROM ExecD IMPORT Library;
  4. IMPORT R;
  5.  
  6. CONST
  7.  loggerName="logger.library";
  8.  version=40; (* Ihre Versionsnummer *)
  9.  
  10. TYPE
  11.  LoggerBasePtr=POINTER TO LoggerBase;
  12.  LoggerBase=RECORD
  13.   lib: Library;
  14.  END;
  15.  
  16. PROCEDURE clear; CODE -30;
  17. PROCEDURE firstPos():LONGCARD; CODE -36;
  18. PROCEDURE nextPos():LONGCARD; CODE -42;
  19. PROCEDURE read(pos{R.D2}:LONGCARD):CHAR; CODE -48;
  20. PROCEDURE write(ch{R.D2}:CHAR); CODE -54;
  21. PROCEDURE writeStamp; CODE -60;
  22.  
  23. END Logger.def
  24.